home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 25
/
Aminet 25 (1998)(GTI - Schatztruhe)[!][Jun 1998].iso
/
Aminet
/
util
/
boot
/
AStart41.lha
/
AStart
/
s
/
astart
/
alternate-startup
Wrap
Text File
|
1998-02-27
|
3KB
|
157 lines
; $VER: alternate-startup based on startup-sequence 39.9 (9.8.92)
; $CATALOG: alternatestartup.catalog
/// ALTSTARTUP 1 "Alternate startup"
// "Never"
; $ALTSTARTUP: NEVER
// "When pressed"
; $ALTSTARTUP: QUALIFIER
// "When not pressed"
; $ALTSTARTUP: INVERSE
// "Always"
; $ALTSTARTUP: ALWAYS
////
/// QUALIFIER 0 "AltStartup qualifier"
// "Any of the shifts"
; $QUALIFIER: 3
// "Any of the shifts or Caps Lock"
; $QUALIFIER: 7
// "Control"
; $QUALIFIER: 8
// "Any of the shifts or Control"
; $QUALIFIER: 11
// "Any Amiga key"
; $QUALIFIER: 192
// "Any Shift or Amiga key"
; $QUALIFIER: 195
////
/// SETPATCH 1 "SetPatch"
// "Do not run"
// "Run"
C:SetPatch QUIET
////
FailAt 21
Makedir >NIL: RAM:Clipboards
/// T_ASSIGN 1 "T: options"
// "To RAM:T"
Makedir >NIL: RAM:T
Assign >NIL: T: RAM:T
// "To SYS:T"
Assign >NIL: T: SYS:T
////
Assign >NIL: CLIPS: RAM:Clipboards
/// ENV 0 "ENV: and ENVArc:"
// "RAM:ENV"
C:Copy >NIL: ENVARC: RAM:ENV ALL NOREQ
Assign ENV: RAM:ENV
// "ENV->ENVArc"
Assign ENV: ENVArc:
// "HappyENV"
C:MountENV
////
Assign >NIL: REXX: S:
Assign >NIL: PRINTERS: DEVS:Printers
Assign >NIL: KEYMAPS: DEVS:Keymaps
Assign >NIL: LOCALE: SYS:Locale
Assign >NIL: LIBS: SYS:Classes ADD
Assign >NIL: HELP: LOCALE:Help DEFER
/// DOSDRIVERS 0 "Mounting DOSDrivers"
// "Mount"
BindDrivers
C:Mount >NIL: DEVS:DOSDrivers/~(#?.info)
// "Do not mount"
////
/// MONITORS 0 "Activate Monitors"
// "Do not activate"
// "Activate them"
IF EXISTS DEVS:Monitors
IF EXISTS DEVS:Monitors/VGAOnly
DEVS:Monitors/VGAOnly
EndIF
C:List >NIL: DEVS:Monitors/~(#?.info|VGAOnly) TO T:M LFORMAT "DEVS:Monitors/%s"
Execute T:M
C:Delete >NIL: T:M
EndIF
// "Activate them (no checking)"
IF EXISTS DEVS:Monitors/VGAOnly
DEVS:Monitors/VGAOnly
EndIF
C:List >NIL: DEVS:Monitors/~(#?.info|VGAOnly) TO T:M LFORMAT "DEVS:Monitors/%s"
Execute T:M
C:Delete >NIL: T:M
////
/// IPREFS 0 "Run IPrefs"
// "No"
// "Yes"
C:IPrefs
////
/// CONCLIP 0 "Run ConClip"
// "No"
// "Yes"
C:ConClip
////
/// ADDDT 0 "AddDataTypes"
// "No"
// "Yes"
C:AddDataTypes REFRESH QUIET
////
%PATH%
/// USERSTARTUP 1 "User-Startup options"
// "Do not execute"
// "Partial execution"
IF EXISTS S:User-Startup
C:ConvertX S:User-startup T:User-startup "((# (C:Assign|Assign|If|EndIf|Lab|Skip|Else)#?)|(#?SAFETOEXECUTE#?))"
Execute T:User-startup
Delete T:User-Startup QUIET
EndIf
// "Full execution"
IF EXISTS S:User-Startup
Execute S:User-Startup
EndIf
// "Full execution (no checking)"
Execute S:User-Startup
////
/// USERSTARTUP_ALT 0 "User-startup.alt options"
// "Do not execute"
// "Execute"
IF EXISTS S:User-Startup.alt
Execute S:User-Startup.alt
EndIf
// "Execute (no checking)"
Execute S:User-Startup.alt
////
/// LOADWB 0 "Workbench loading"
// "Workbench"
C:LoadWB
// "Workbench (-debug option)"
C:LoadWB -debug
// "Directory Opus 5"
C:LoadDB
// "MBench"
run <>NIL: MBench:MBench
////
/// WBSTARTUP 0 "WBStartup options"
// "Normal: ENABLED, Alt.: NONE"
// "Normal: ENABLED, Alt.: ENABLED"
// "Normal: ENABLED, Alt.: DISABLED"
// "Normal: ENABLED, Alt.: BOTH"
// "Normal: BOTH, Alt.: NONE"
// "Normal: BOTH, Alt.: ENABLED"
// "Normal: BOTH, Alt.: DISABLED"
// "Normal: BOTH, Alt.: BOTH"
////